home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
TPUG - Toronto PET Users Group
/
TPUG Users Group CD
/
TPUG Users Group CD.iso
/
CRS
/
crs58.d81
/
icondir.seq
(
.txt
)
< prev
next >
Wrap
GEOS ConVerT
|
2009-10-10
|
24KB
|
327 lines
ICONDIR
SEQ formatted GEOS file V1.0
Epson FX-80
CONVERT
BLASTER'S CONVERTER V2.5
StudentForthV1.0
Hank Wilkinson
Makes hard copy of icon, blocks/k, date, names, data, header & type.
`SCREENFILE0
EXECUT
BRANC
0BRANC
(LOOP
hhhhL
(+LOOP
j z 8
(FIND
vQx)?
ENCLOS
?TERMINA
DMINU
TOGGL
CONSTAN
VARIABL
+ORIGI
WARNIN
VOC-LIN
OFFSE
CONTEX
CURREN
TRAVERS
LATES
?ERRO
?PAIR
?LOADIN
COMPIL
SMUDG
DECIMA
(;CODE
<BUILD
-TRAILIN
EXPEC
BLANK
(NUMBER
NUMBE
(ABORT
CREAT
[COMPILE
LITERA
DLITERA
?STAC
INTERPRE
IMMEDIAT
VOCABULAR
DEFINITION
Student Forth 1.0
UPDAT
EMPTY-BUFFER
BUFFE
(LINE
MESSAG
MSG #
FORGE
REPEA
SPACE
SCR #
SETPATTER
J8 3
?PIXE
CHARWIDT
STRING
STRING
GETFIL
INITFORPRIN
PRINTBUFFE
STOPPRIN
PRINTASCI
SETNL
STARTPRIN
STARTASCI
GETDIMENSION
DONEWITHI
INITFORI
READBYT
NEXTRECOR
TRACKSECTO
DISKBLOC
POINTERINDE
DISKBYT
DISKERRO
GETBLOC
FINDFIL
SAVEPTR
RESTOREPTR
CREAT
Empty
SHOW_NAM
SHOW_NAME
Q n *
GETDIRHEA
SHOW_ENTRIE
SHOW_OFF_PAG
GETPDRIVE
disk error message
SCREENBAS
ALLOT
ALLOT
SENDSCREENBIT
LTRIA
POSITIO
CARDRO
MOVERO
4LINE
2ACROS
SCRNHD
SCR #
SCR #
CUR_DIR_HEA
MINUTE
OFF_DISK_NAM
#Student Forth SCREENFILE from disk
, on
@ %0
CRTOGGL
S0J**
WITHI
BETWEE
INV_RECOR
BFR_OVERFLO
CAR_RE
NEWCARDSE
ESC_RULE
ESC_GRAPHIC
PAGE_BREA
DISKBLKBU
FILEHEADE
CURDIRHEA
FILETRSCTA
DIRENTRYBU
BYTECOUNTE
CHARCOUNTE
PAGECOUNTE
VERSIONHEADE
MAXPAGE
STARTPAG
ENDPAG
TEXTBU
%SAVEFORTH
GETNAM
type file name and return
OPENVLI
CLOSEVLI
PREVIOUSRECOR
NEXTRECOR
POINTRECOR
READRECOR
GETPAG
open error #
record pointing error #
FILTERTEX
FILTERPAG
TESTFILTE
PAGECOMPIL
PAGECOMPIL
TEXTLOA
n a6d7|
SETDEVIC
OPENDIS
?DISKERRO
Disk Error Number
Encoutered
)Check Drive, Door, Disk etc., and restart*
CURDRIVETYPE
CURDRIVETYPE
CURDRIVETYPE
SETDIS
PRNTFILENAM
CURDRIV
CURRENTDRIV
LOADDRIVERMESSAG
Insert disk with printer drive R9*
+ close door and hit any key but period (.)
(Period will return to deskTop)
FINDPDRIVE
8R9W$
8R9W$
9R9W$
LOADPDRIVE
%R9j9
GetFile error #
Hit any key to abort|
CURDIRBLKBU
ALLOT
HEADERARRA
ALLOT
Y k%
GETFHDRINF
READENTRYBLOC
(BITMAPUP
DRAWICO
CBMICO
TITLEICO
DRAWTITLEICO
DRAWCB
COLUM
XCOLUM
2#EMI
PUTSIZ
PUTTIME&DAT
SHOWNAM
PUTFILENAM
PUTPERMNAM
PUTPAR/AUTHO
PUTPARAP
PUTTRACK/SECTOR
PUTSTRUCTUR
VLIR
PUTTYP
Not_GEOS
BASIC
ASSEM
SYSTEM
DESK_ACC
APPLICATION
APP_DATA
PRINTER
INPUT_DEV
DISK_DEV
SYS_BOOT
AUTO_EXEC
ENTRY
DRAWICON
PUTSIZE
PUTTIME&DATE
PUTFILENAME
PUTPERMNAME
PUTPAR/AUTHOR
PUTPARAPP
PUTTRACK/SECTORS
PUTSTRUCTURE
PUTTYPE
#OFBLOCK
#OFDISKBLOCK
#OFFILE
#OFPAGE
ROWSPRINTE
OFFPAG
COUNTBLOC
NAMEBUFFE
ALLOT
DRIVEBUFFE
OPENTEXTBUFFE
ALLOT
CANCELTEXTBUFFE
ALLOT
#OFDRIVE
DISKNAM
DRIVETYP
COUNTDRIVE
Q hOn s
NEXTDRIV
(PRINT
(Print)
SETOPENTEX
(TODESKTOP
(to deskTop)
SETCANCELTEX
SETNAMEBUFFE
SET3DRIVEBUFFE
SET2DRIVEBUFFE
SETDRIVEBUFFE
COUNTENTRIE
RDuN)N
DRAWTITL
ICONDIR |S
On disk: fSXO1H|S
files using
Page dN
of 8N
SHOWDIRECTORYBLOC
L"MSM
POFFSE
SENDRO
PRINTINF
DSKIMAG
DRCIMAG
OPNIMAG
CNCLIMAG
DBTXTST
DBVARST
DBGETSTRIN
DBSYSOP
DBGETFILE
DBGRPHST
DBOPVE
DBUSRICO
DB_USR_OU
SYS_DB_ICON_WIDT
SYS_DB_ICON_HEIGH
DEF_DB_PO
SYSDBDAT
RSTRFRMDIALO
(DODLGBOX
DSKICONSERVIC
DRVICONSERVIC
OPNICONSERVIC
CNCLICONSERVIC
DSKICO
DRVICO
OPNICO
CNCLICO
DIRDLGBO
DRIVESTOR
DOACTIO
P@Ra9
zOs:#"
Student Forth |SM
Icon Directory Lister
for GEOS users
ICONDIR*
copyright 1990 Hank Wilkinson
*For Info About Student Forth Send SASE to:
Anticipatory Design Science
Freeman Building, Suite 303
612 Pasteur Drive
Greensboro, North Carolina 27403